home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / ShareMailGiftware / AmigaTalk / testfiles / TestNarrator < prev    next >
Text File  |  2002-10-27  |  1KB  |  55 lines
  1. nar <- Narrator new
  2.  
  3. nar setPitch: 70
  4. nar speak: 'Hello, these are some Nare rater tests.' print
  5. nar speak: 'Spelling afffects the words I produce, so experiment!' print
  6.  
  7. nar setVolume: 64
  8. nar speak: 'Vol yoom iz now maksed out!' print
  9.  
  10. nar setPitch: 310
  11. nar speak: 'How about a high voice?' print
  12.  
  13. nar setMode: 'robotic'
  14. nar speak: 'Now, I am a RowBot!' print
  15.  
  16. nar setSex: 1
  17. nar setPitch: 100
  18. nar speak: 'Now, I sound like a male RowBot!' print
  19.  
  20. nar setMode: 'natural'
  21. nar setPitchModulation: 180
  22. nar speak: 'Now, I sound like an old man!' print
  23.  
  24. nar setPhoneme: 'AE'
  25. nar setCentralizeValue: 90
  26. nar speak: 'Here iz a new aksent for me.' print
  27.  
  28. nar setEnthusiasm: (2/32)
  29. nar setCentralizeValue: 0
  30. nar speak: 'My enthuzyazm has changed.' print
  31.  
  32. nar setVolume: 15
  33. nar speak: 'Now, I am going to whissper.' print
  34.  
  35. nar setPitchModulation: 0
  36. nar setVolume: 64
  37.  
  38. ph <- nar translateText: 'Here iz a foe netick string.' print
  39. nar speakPhonetics: ph print
  40.  
  41. nar speak: ' '
  42. nar setFormant2: 89
  43. nar setFormant2Amplitude: 2
  44. nar speak: 'Notice the frog in my voice.' print
  45.  
  46. nar speak: 'Lets clear it up' print
  47. nar setFormant2: 0
  48. nar speak: 'Halls of medicine does it again!' print
  49.  
  50. nar speak: 'Feel free to experiment with me.' print
  51. nar setEnthusiasm: (32/32)
  52. nar speak: 'Enjoy your Amiga Talk program!' print
  53.  
  54. nar close
  55.